home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / c / jpl_c.zip / FPUTS.C < prev    next >
Text File  |  1986-05-18  |  768b  |  26 lines

  1. /* 1.1  01-08-86                         (fputs.c)
  2.  ************************************************************************
  3.  *            Robert C. Tausworthe                *
  4.  *            Jet Propulsion Laboratory            *
  5.  *            Pasadena, CA 91009        1986        *
  6.  ************************************************************************/
  7.  
  8. #include "defs.h"
  9. #include "stdtyp.h"
  10. #include "stdio.h"
  11.  
  12. /************************************************************************/
  13.     METACHAR
  14. fputs(s, fp)        /* Put the string s out to the FILE fp.  Return
  15.                NULL if ok, EOF if not.            */
  16. /*----------------------------------------------------------------------*/
  17. FAST STRING s;
  18. FILE *fp;
  19. {
  20.     while (*s)
  21.         if (putca(*s++, fp) IS EOF)
  22.             return(EOF);
  23.  
  24.     return NULL;
  25. }
  26.